home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 1 / NetNews Offline Volume 1.iso / news / fido / ger / amiprog / 87 < prev    next >
Internet Message Format  |  1996-03-16  |  3KB
  1. From: Willi_Elser@p45.f1416.n246.z2.fido.sub.org (Willi Elser)
  2. Organization: -+- Das Spotted jeder Beschreibung! -+-
  3. Path: f1416.n246.z2.fidonet.org!not-for-mail
  4. Newsgroups: fido.ger.amiprog
  5. Subject: Re: Mitternacht
  6. Message-ID: <MSGID_2=3A246=2F1416.45_3043c122@fidonet.org>
  7. References: <MSGID_2=3A246=2F2248.4=40FidoNet_4632e76b@fidonet.org>
  8. Date: Tue, 29 Aug 1995 19:38:42 +0200
  9.  
  10. Das Athanasiosle belaestigte Guenter Bartsch mit:
  11.  
  12.  GB>> Hm, hier kommt es weniger auf Pascal- denn auf Betriebssystemkenntnisse
  13.  GB>> an.
  14.  AM> Na super. Da ich jedoch mit dem betriebssystem (bis auf 1 oder 2
  15.  AM> Spielereien) noch nicht direkt zu tun hatte...:-/ Nunja.
  16.  
  17. Er meinte, dass man da mehr wissen muss, wo die uhrzeit rumlungert, als wo der
  18. Pascal hockt :)
  19.  
  20.  AM> Ich warte mal ab was ich in der Schule zum Thema Pascal lernen tue.
  21.  
  22. Da wirste mit obigem Problem eher Pech haben :/
  23.  
  24.  GB>> Mein Vorschlag waere, in einer Unendlichschleife (REPEAT...UNTIL FALSE)
  25.  GB>> zunaechst einmal mit DateStamp aus DOS die aktuelle Uhrzeit zu
  26.  GB>> erfragen. Diese Funktion liefert drei Langworte zurueck, wobei das
  27.  GB>> zweite die Anzahl der seit Mitternacht vergangenen Minuten angibt.
  28.  AM> Hoert sich eigentlich ziemlich gut an.
  29.  
  30. Ja, nur wuerd ich`s nicht mit Repeat Until, sondern mit Delay() machen, das
  31. muesste(!) Rechenzeit sparen.
  32.  
  33.  GB>> Diese Zahl der Minuten muss man nun nur noch in Ticks umrechnen, um
  34.  GB>> dann mit Delay genau diese Zeit zu warten.
  35.  AM> Naja.. davon habe ich keinen Plan, wieso das ganze in Ticks umgerechnet
  36.  AM>        werden
  37.  AM> soll ( was sind Ticks?:-) )... egal.
  38.  
  39. Nich soo wichtig =:)
  40.  
  41.  GB>> Das koennte man (altertuemlich ;-) mit EXECUTE oder modern mit SYSTEM
  42.  GB>> anstellen.
  43.  AM> ?
  44.  
  45. Execute() is der alte Aufruf, System() gibt`s erst ab Kick 2.0. Im Endeffekt
  46. kommt`s aber bei deinem Problem auf`s gleiche raus. 
  47.  
  48.  GB>> CONST Minuten_seit_Mitternacht = 9*60+43 ; (* z.B. 9 Uhr 43 *)
  49.  AM> Und diese Konstante blicke ich auch nicht... wozu?
  50.  
  51. Du musst doch wissen wie lang dein Programm warten soll, bis es das  Programm
  52. ausfuehrt, oder? Bzw. andersrum, wie lange es noch warten soll, BIS Mitternacht
  53. is, dass weiss es ja auch nicht von alleine. Btw. bei einer BBS hielte ich es
  54. fuer schlauer, die events auf so ca. 4 Uhr nachts zu legen. Da ist in der Regel
  55. Ruhe im Modem.
  56.  
  57. [...]
  58.  
  59.  AM> Puh.. da gehts aber schon happiger zu in dem Programm. Muss wohl
  60.  AM> irgendwo mal en Buch finden um Pascal gescheit zu lernen...
  61.  
  62. Naja, vielleicht haette`s der Guenter *noch* mehr kommentieren sollen :)
  63.  
  64. Yours, Willi....
  65.  
  66.